FDR example for Table B3: Uses R package p.adjustp.vec.all<-c(0.017, 0.024, 0.232,0.002, 0.001, 0.219, 0.202, 0.1, 0.216, 0.001, 0.004, 0.397, 0.009, 0.895)p.vec.all.fdr<-p.adjust(p.vec.all, method = "BH", n = 14)p.vec.all.fdr#Output0.0396 0.04800.27070.0093 0.00700.27070.2707 0.17500.2707 0.0070 0.01400.42750.0252 0.8950